home *** CD-ROM | disk | FTP | other *** search
Text File | 1987-02-12 | 2.0 KB | 101 lines | [TEXT/MSWD] |
- OPTIONS TERSE
- - --=>Computer Information Survey<=--
- -
- - This survey will ask for some general computer information.
- -
- -
-
- IF<>YES Do you want to continue with the questionaire?
- GOTO Abort
- ENDIF
-
- START
-
- INPUT! 45 Enter computer type :
- WRTXT Computer type:
- WRINP
-
- IFYES Do you have a non-apple memory upgrade (Y/N)?
- INPUT! 50 What brand?
- WRTXT Non-apple Upgrade:
- WRINP
- ELSE
- WRTXCR No non-apple upgrade
- ENDIF
-
- INPUT! 50 What type of modem are you using?
- WRTXT Modem Brand:
- WRINP
-
- IFYES Do you have a printer (Y/N)?
- INPUT! 50 What brand?
- WRTXT Printer Brand:
- WRINP
- ELSE
- WRTXCR No printer
- ENDIF
-
- IFYES Do you have an external disk drive?
- INPUT! 50 What brand?
- WRTXT Exernal Drive:
- WRINP
- ELSE
- WRTXCR No External Drive
- ENDIF
-
- IFYES Do you have a Hard Disk Drive (Y/N)?
- INPUT! 50 What brand and size?
- WRTXT Hard Drive Brand and Size:
- WRINP
- ELSE
- WRTXCR No Hard Drive
- ENDIF
-
- IFYES Do you have a fan (Y/N)?
- INPUT! 50 What brand?
- WRTXT Fan Brand:
- WRINP
- ELSE
- WRTXCR No Fan
- ENDIF
-
- INPUT! 15 How many hours a week do you use your computer?
- WRTXT Hours of use:
- WRINP
-
- - What is the computer primarily used for (Business, Home, Entertainment, Etc.)
- - Hit return on a blank line when finished.
- WRTXCR Primary Use:
- - .........1.........2.........3.........4.........5.........6.........7.........
-
- $21 INPUT 75
- IFINP
- WRTXT
- WRINP
- GOTO $21
- ENDIF
-
- - What is your opinion on Pirating Software
- WRTXCR Pirating Opinion
- - Hit return on a blank line when finished.
- - .........1.........2.........3.........4.........5.........6.........7.........
-
- $11 INPUT 75
- IFINP
- WRTXT
- WRINP
- GOTO $11
- ENDIF
-
- IFYES Are you satisfied with what you entered (Y/N)?
- SAVE
- ELSE
- IFYES Do you want to start over?
- RESTRT
- ENDIF
- - Answers not recorded. Please fill out the survey later.
- ENDIF
- WAITCR Hit CR to continue...
-
- ABORT EXIT
-